home *** CD-ROM | disk | FTP | other *** search
/ Mobiclic 48 / MOBICLIC 48.ISO / pc / DATA / COMMUNS / M_BLUE_WINDOW.dir / 00042_Script_BOUCLE_GREEN_WINDOW < prev    next >
Text File  |  2002-07-23  |  428b  |  15 lines
  1. global validMBG, g_BlueWBtons_track1
  2. ------------------------
  3. on exitFrame me
  4.   repeat with i=1 to 5
  5.     Nopiste = g_BlueWBtons_track1 + 2*(i-1)
  6.     case(validMBG[i]) of 
  7.       0:
  8.         sprite(Nopiste).member = "BTON_"&gimme2digits(i)&"_U"
  9.         sprite(Nopiste+1).member.forecolor = 248
  10.       1:
  11.         puppetSprite Nopiste, FALSE
  12.         sprite(Nopiste+1).member.forecolor = 255
  13.     end case
  14.   end repeat
  15. end